Restore tiger from v. 1.9.

diff --git a/gpsbabel/tiger.c b/gpsbabel/tiger.c
new file mode 100644 (file)
index 0000000..ecf9370
--- /dev/null
+++ b/gpsbabel/tiger.c
@@ -0,0 +1,119 @@
+/*
+    Access to  U.S. Census Bureau "tiger" format.
+
+    Copyright (C) 2002 Robert Lipe, robertlipe@usa.net
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111 USA
+
+ */
+
+#include "defs.h"
+#include "magellan.h"
+
+static FILE *file_in;
+static FILE *file_out;
+static void *mkshort_handle;
+
+#define MYNAME "GPSUTIL"
+
+static void
+rd_init(const char *fname, const char *args)
+{
+       file_in = fopen(fname, "r");
+       mkshort_handle = mkshort_new_handle();
+
+       if (file_in == NULL) {
+               fatal(MYNAME ": Cannot open %s for reading\n", fname);
+       }
+}
+
+static void
+rd_deinit(void)
+{
+       fclose(file_in);
+       mkshort_del_handle(mkshort_handle);
+}
+
+static void
+wr_init(const char *fname, const char *args)
+{
+       file_out = fopen(fname, "w");
+
+       if (file_out == NULL) {
+               fatal(MYNAME ": Cannot open %s for writing\n", fname);
+       }
+}
+
+static void
+wr_deinit(void)
+{
+       fclose(file_out);
+}
+
+static void
+data_read(void)
+{
+       double lat,lon;
+       char desc[100];
+       char icon[100];
+       char ibuf[1024];
+       waypoint *wpt_tmp;
+
+       while (fgets(ibuf, sizeof(ibuf), file_in)) {
+               if( sscanf(ibuf, "%lf,%lf:%100[^:]:%100[^\n]", 
+                               &lon, &lat, icon, desc)) {
+                       wpt_tmp = xcalloc(sizeof (*wpt_tmp), 1);
+
+                       wpt_tmp->position.longitude.degrees = lon;
+                       wpt_tmp->position.latitude.degrees = lat;
+                       wpt_tmp->description = xstrdup(desc);
+                       wpt_tmp->shortname = mkshort(mkshort_handle, desc);
+
+                       waypt_add(wpt_tmp);
+               }
+       }
+}
+
+static void
+gpsutil_disp(const waypoint *wpt)
+{
+       char *pin;
+       if (wpt->creation_time > time(0) - 3600 * 24 * 14)
+               pin = "greenpin";
+       else
+               pin = "redpin";
+       fprintf(file_out, "%f,%f:%s:%s\n", 
+               wpt->position.longitude.degrees,
+                wpt->position.latitude.degrees,
+                pin,
+                wpt->description);
+}
+
+static void
+data_write(void)
+{
+       fprintf(file_out, "#tms-marker\n");
+       waypt_disp_all(gpsutil_disp);
+}
+
+
+ff_vecs_t tiger_vecs = {
+       rd_init,
+       wr_init,
+       rd_deinit,
+       wr_deinit,
+       data_read,
+       data_write,
+};